home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / yerk / mps231ss.hqx / Mops ƒ / Mops.rsrc / CODE_1.txt < prev    next >
Text File  |  1993-04-23  |  7KB  |  122 lines
  1. # near model CODE resource
  2. # entry label at 0x0000
  3. export_0:
  4. entry:
  5. 00000000  6016                     bra        +0x18 /* 00000018 */
  6. 00000002  0004 93E0                ori.b      D4, 0xE0
  7. 00000006  0000 4E20                ori.b      D0, 0x20 /* ' ' */
  8. 0000000A  0004 93E0                ori.b      D4, 0xE0
  9. 0000000E  0000 C350                ori.b      D0, 0x50 /* 'P' */
  10. 00000012  0000 1770                ori.b      D0, 0x70 /* 'p' */
  11. 00000016  0000 4E71                ori.b      D0, 0x71 /* 'q' */
  12. // begin alternate branch 00000018-0000001A
  13. export_1:
  14. label00000018:
  15. 00000018  4E71                     nop
  16. // end alternate branch 00000018-0000001A
  17. export_1: // at 00000018 (misaligned)
  18. label00000018: // (misaligned)
  19. 0000001A  2A78 0904                movea.l    A5, [0x00000904 /* CurrentA5 */]
  20. 0000001E  47FA 7FDE                lea.l      A3, [PC + 0x7FDE /* 00007FFE */]
  21. 00000022  2F3C 0000 CDCD           move.l     -[A7], 0xCDCD
  22. 00000028  2F3C 0000 ABAB           move.l     -[A7], 0xABAB
  23. 0000002E  2E0F                     move.l     D7, A7
  24. 00000030  204F                     movea.l    A0, A7
  25. 00000032  91FA FFDE                sub.l      A0, [PC - 0x22 /* 00000012 */]
  26. 00000036  42A0                     clr.l      -[A0]
  27. 00000038  42A0                     clr.l      -[A0]
  28. 0000003A  213C 0000 00CD           move.l     -[A0], 0xCD
  29. 00000040  213C 0000 00AB           move.l     -[A0], 0xAB
  30. 00000046  2C48                     movea.l    A6, A0
  31. 00000048  2C08                     move.l     D6, A0
  32. 0000004A  91FA FFC2                sub.l      A0, [PC - 0x3E /* 0000000E */]
  33. 0000004E  2808                     move.l     D4, A0
  34. 00000050  CD4F                     exg        A6, A7
  35. 00000052  486D FFFC                pea.l      [A5 - 0x4]
  36. 00000056  A86E                     trap       InitGraf
  37. 00000058  2044                     movea.l    A0, D4
  38. 0000005A  A02D                     trap       SetApplLimit
  39. 0000005C  A063                     trap       MaxApplZone
  40. 0000005E  A11D                     trap       MaxMem, flags=1
  41. 00000060  2600                     move.l     D3, D0
  42. 00000062  A8FE                     trap       InitFonts
  43. 00000064  A912                     trap       InitWindows
  44. 00000066  A9CC                     trap       TEInit
  45. 00000068  A930                     trap       InitMenus
  46. 0000006A  A850                     trap       InitCursor
  47. 0000006C  303C 009F                move.w     D0, 0x9F
  48. 00000070  A746                     trap       GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  49. 00000072  2848                     movea.l    A4, A0
  50. 00000074  7060                     moveq.l    D0, 0x60
  51. 00000076  A746                     trap       GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  52. 00000078  B9C8                     cmpa.l     A4, A0
  53. 0000007A  56C5                     sne        D5
  54. 0000007C  6706                     beq        +0x8 /* 00000084 */
  55. 0000007E  70FF                     moveq.l    D0, 0xFFFFFFFF
  56. 00000080  A055                     trap       StripAddress
  57. 00000082  6004                     bra        +0x6 /* 00000088 */
  58. label00000084:
  59. 00000084  2038 031A                move.l     D0, [0x0000031A /* MaskBC/MaskHandle/MaskPtr/Lo3Bytes */]
  60. label00000088:
  61. 00000088  2800                     move.l     D4, D0
  62. 0000008A  E18D                     lsl        D5, 8
  63. 0000008C  203C 0000 0198           move.l     D0, 0x198
  64. 00000092  A346                     trap       GetOSTrapAddress, flags=3
  65. 00000094  B9C8                     cmpa.l     A4, A0
  66. 00000096  56C5                     sne        D5
  67. 00000098  E18D                     lsl        D5, 8
  68. 0000009A  203C 0000 01AD           move.l     D0, 0x1AD
  69. 000000A0  A346                     trap       GetOSTrapAddress, flags=3
  70. 000000A2  B9C8                     cmpa.l     A4, A0
  71. 000000A4  56C5                     sne        D5
  72. 000000A6  6724                     beq        +0x26 /* 000000CC */
  73. 000000A8  203C 7072 6F63           move.l     D0, 0x70726F63 /* 'proc' */
  74. 000000AE  A1AD                     trap       Gestalt, flags=1
  75. 000000B0  661A                     bne        +0x1C /* 000000CC */
  76. 000000B2  2F08                     move.l     -[A7], A0
  77. 000000B4  203C 6670 7520           move.l     D0, 0x66707520 /* 'fpu ' */
  78. 000000BA  A1AD                     trap       Gestalt, flags=1
  79. 000000BC  6612                     bne        +0x14 /* 000000D0 */
  80. 000000BE  2F08                     move.l     -[A7], A0
  81. 000000C0  6710                     beq        +0x12 /* 000000D2 */
  82. 000000C2  42A7                     clr.l      -[A7]
  83. 000000C4  42A7                     clr.l      -[A7]
  84. 000000C6  F21F                     .extension 0x21F // unimplemented
  85. 000000C8  9800                     sub.b      D4, D0
  86. 000000CA  6006                     bra        +0x8 /* 000000D2 */
  87. label000000CC:
  88. 000000CC  7001                     moveq.l    D0, 0x01
  89. 000000CE  2F00                     move.l     -[A7], D0
  90. label000000D0:
  91. 000000D0  42A7                     clr.l      -[A7]
  92. label000000D2:
  93. 000000D2  4A2B 8018                tst.b      [A3 - 0x7FE8]
  94. 000000D6  6600 003C                bne        +0x3E /* 00000114 */
  95. 000000DA  96BA FF2A                sub.l      D3, [PC - 0xD6 /* 00000006 */]
  96. 000000DE  203A FF22                move.l     D0, [PC - 0xDE /* 00000002 */]
  97. 000000E2  B680                     cmp.l      D3, D0
  98. 000000E4  6D02                     blt        +0x4 /* 000000E8 */
  99. 000000E6  2600                     move.l     D3, D0
  100. label000000E8:
  101. 000000E8  2743 800C                move.l     [A3 - 0x7FF4], D3
  102. 000000EC  42A7                     clr.l      -[A7]
  103. 000000EE  2F3C 434F 4445           move.l     -[A7], 0x434F4445 /* 'CODE' */
  104. 000000F4  3F3C 0002                move.w     -[A7], 0x2
  105. 000000F8  A9A0                     trap       GetResource
  106. 000000FA  2057                     movea.l    A0, [A7]
  107. 000000FC  A02A                     trap       HUnlock
  108. 000000FE  2057                     movea.l    A0, [A7]
  109. 00000100  2003                     move.l     D0, D3
  110. 00000102  A024                     trap       SetHandleSize
  111. 00000104  4A80                     tst.l      D0
  112. 00000106  6708                     beq        +0xA /* 00000110 */
  113. 00000108  3F3C 0003                move.w     -[A7], 0x3
  114. 0000010C  A9C8                     trap       SysBeep
  115. 0000010E  A9F4                     trap       ExitToShell
  116. label00000110:
  117. 00000110  205F                     movea.l    A0, [A7]+
  118. 00000112  A029                     trap       HLock
  119. label00000114:
  120. 00000114  45FA FEEC                lea.l      A2, [PC - 0x114 /* 00000002 */]
  121. 00000118  4EED 004A                jmp        [A5 + 0x4A]
  122.